PC Answers 1998 January/PC Answers Issue 49 Cover CD January 1998.iso/Apps/Director/DATA.Z/Ink Effects.dir/Scripts_23_Constrain Moveable Sprite.ls

Text File | 1997-05-10 | 426 b | 19 lines

on mouseDown
  set the constraint of sprite 7 to 6
  set the constraint of sprite 8 to 6
  updateStage()
end

on mouseUp
  global gObjectH, gObjectV
  if the visible of sprite 7 = 1 then
    set gObjectH to the locH of sprite 7
    set gObjectV to the locV of sprite 7
  else
    if the visible of sprite 8 = 1 then
      set gObjectH to the locH of sprite 8
      set gObjectV to the locV of sprite 8
    end if
  end if
end